home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Otherware
/
Otherware_1_SB_Development.iso
/
mac
/
hypercar
/
xfcn
/
spttool.cpt
/
Support Tools eXternals 1.2.5
/
background_5283.txt
< prev
next >
Wrap
Text File
|
1990-11-13
|
4KB
|
172 lines
-- background: 5283 from stack: in.5
-- bmap block id: 35983
-- flags: 0000
-- background id: 0
-- name: Index
-- part 4 (field)
-- low flags: 01
-- high flags: 2007
-- rect: left=251 top=99 right=314 bottom=484
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 14
-- style flags: 0
-- line height: 19
-- part name: List
----- HyperTalk script -----
on mouseUp
-- go to specified example card
push cd
put selectTheLine(clickLine()) into whichExternal
if whichExternal = empty then exit mouseUp
visual iris open
if last char of whichExternal = "*" then
delete char length(whichExternal) - 2 to length(whichExternal) of whichExternal
end if
go cd whichExternal of bg "examples"
if the result is "no such card" then
pop card
answer "Example not done yet." with "Sorry"
end if
end mouseUp
-- part 18 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=11 top=54 right=85 bottom=45
-- title width / last selected line: 0
-- icon id / first selected line: 19290 / 19290
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: About
----- HyperTalk script -----
on mouseUp
push cd
go cd "about"
end mouseUp
-- part 19 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=49 top=54 right=85 bottom=83
-- title width / last selected line: 0
-- icon id / first selected line: 263 / 263
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: report bugs
----- HyperTalk script -----
on mouseUp
push cd
go cd "report bugs"
end mouseUp
-- part 20 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=87 top=54 right=85 bottom=124
-- title width / last selected line: 0
-- icon id / first selected line: 301 / 301
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Index
-- part 21 (button)
-- low flags: 00
-- high flags: 0001
-- rect: left=194 top=60 right=83 bottom=227
-- title width / last selected line: 0
-- icon id / first selected line: 1726 / 1726
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Return
-- part 22 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=246 top=60 right=84 bottom=279
-- title width / last selected line: 0
-- icon id / first selected line: 1728 / 1728
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
-- part 23 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=284 top=60 right=84 bottom=317
-- title width / last selected line: 0
-- icon id / first selected line: 1731 / 1731
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
-- part 24 (button)
-- low flags: 80
-- high flags: 2001
-- rect: left=246 top=60 right=83 bottom=279
-- title width / last selected line: 0
-- icon id / first selected line: 1729 / 1729
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Previous
----- HyperTalk script -----
on mouseUp
visual wipe right
go prev card
end mouseUp
-- part 25 (button)
-- low flags: 80
-- high flags: 2001
-- rect: left=284 top=60 right=83 bottom=317
-- title width / last selected line: 0
-- icon id / first selected line: 1730 / 1730
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Next
----- HyperTalk script -----
on mouseUp
visual wipe left
go next card
end mouseUp